home *** CD-ROM | disk | FTP | other *** search
/ Animation How-To / Animation How-to CD.iso / PLY / CHAPTER5 / SHATTER / SHAT3.PI < prev    next >
Text File  |  1994-01-01  |  2KB  |  109 lines

  1. // SHAT3.PI - 192 pieces, sine modulation
  2.  
  3. include "\ply\colors.inc"
  4. start_frame 0
  5. end_frame 199
  6. total_frames 200
  7.  
  8. outfile "shat3"
  9.  
  10. viewpoint {
  11.    from <6, 12,-8>
  12.    at <0,0,0>
  13.    up   <0, 1,  0>
  14.    angle 30
  15.    resolution 320,240
  16.    aspect 1.33
  17.    }
  18.  
  19. define rspeed frame*0.1
  20. define lspeed frame*0.001
  21.  
  22. define fr frame
  23. define pi 3.14159
  24.  
  25. define b (total_frames-fr)/total_frames
  26. define r1 (1 - cos(2 * pi * fr / total_frames)) / 2
  27. define r2 1 - r1
  28.  
  29. define a001  <-1, 1, 1>
  30. define b001  < 1, 1, 1>
  31. define c001  <-1,-1, 1>
  32.  
  33. define a002  < 1, 1, 1>
  34. define b002  < 1,-1, 1>
  35. define c002  <-1,-1, 1>
  36.  
  37. define a003  < 1, 1,-1>
  38. define b003  < 1,-1,-1>
  39. define c003  < 1, 1, 1>
  40.  
  41. define a004  < 1, 1, 1>
  42. define b004  < 1,-1,-1>
  43. define c004  < 1,-1, 1>
  44.  
  45. define a005  < 1, 1, 1>
  46. define b005  <-1, 1, 1>
  47. define c005  <-1, 1,-1>
  48.  
  49. define a006  < 1, 1, 1>
  50. define b006  <-1, 1,-1>
  51. define c006  < 1, 1,-1>
  52.  
  53. define a007  <-1, 1, 1>
  54. define b007  <-1,-1,-1>
  55. define c007  <-1,-1, 1>
  56.  
  57. define a008  <-1, 1, 1>
  58. define b008  <-1, 1,-1>
  59. define c008  <-1,-1,-1>
  60.  
  61. define a009  < 1,-1, 1>
  62. define b009  <-1,-1, 1>
  63. define c009  <-1,-1,-1>
  64.  
  65. define a010  < 1,-1, 1>
  66. define b010  < 1,-1,-1>
  67. define c010  <-1,-1,-1>
  68.  
  69. define a011  < 1, 1,-1>
  70. define b011  <-1, 1,-1>
  71. define c011  < 1,-1,-1>
  72.  
  73. define a012  <-1,-1,-1>
  74. define b012  <-1, 1,-1>
  75. define c012  < 1,-1,-1>
  76.  
  77. include "moretri.inc"
  78. include "col2.inc"
  79. include "shat2.inc"
  80.  
  81. // Set up background color & lights
  82. background midnightblue
  83. light <0,15,-12>
  84. light <12,-15,-12>
  85. light <2,2,2>,<0,0,0>
  86.  
  87. define bumpy_yellow
  88. texture {
  89.    special surface {
  90.       color <1.5,0.8,0>
  91.       normal N + (dnoise(3*W) - white/2)
  92.       ambient 0.2
  93.       diffuse 0.3
  94.       specular white, 0.7
  95.       microfacet Cook 5
  96.       }
  97.    scale <0.05, 0.05, 0.05>
  98.    }
  99.  
  100. object {sphere <-10,  0,  0>,0.4 translate <frame/2,0,0> bumpy_yellow}
  101. object {sphere <  0,-10,  0>,0.4 translate <0,frame/2,0> bumpy_yellow}
  102. object {sphere <  0,  0,-10>,0.4 translate <0,0,frame/2> bumpy_yellow}
  103. object {sphere < 10,  0,  0>,0.4 translate <-frame/2,0,0> bumpy_yellow}
  104. object {sphere <  0, 10,  0>,0.4 translate <0,-frame/2,0> bumpy_yellow}
  105. object {sphere <  0,  0, 10>,0.4 translate <0,0,-frame/2> bumpy_yellow}
  106.  
  107.  
  108. 
  109.